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(54) AUTOMATIC DATA PROCESSING PROGRAM GENERATION SYSTEM, METHOD 
THEREFOR AND COMPUTER READABLE RECORDING MEDIUM 

(57)Abstract: 

PROBLEM TO BE SOLVED: To automatically 
generate a data processing program for referring to, 
updating and eliminating the chart data of a data base 
by inserting generated cursor definition sentence and 
work variable definition sentence, etc., to the pertinent 
parts of a program skeleton. 

SOLUTION: An automatic program synthesis means 
109 inserts a program name obtained in a program 
skeleton customize information obtaining means 102 to 
an insertion position corresponding to the program 
name among the insertion positions of the program 
skeleton 108. Also, the cursor definition sentence 
generated in a cursor definition sentence generation 
means 105 is inserted. Then, the work variable 
definition sentence generated in a work variable definition sentence generation means 106 is inserted 
to the insertion position corresponding to the work variable definition sentence, an output processing 
sentence generated in an output processing sentence generation means 107 is inserted to the insertion 
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position corresponding to the output processing sentence, the fragments of a corresponding program 
sentence obtained in the program skeleton customize information obtaining means 102 are inserted 
to the other insertion positions, and thus, the program is automatically synthesized. 
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[&?*#©] #©101 fift«l £A^i-£ 0 ft*l^ 

#©102 tt^n^^A^^^^XWa^. #©10 
3 I^A^i^S^»<bir hgi@^£-t?i^ h^ft 
^a^r. #©104 ttffl***H3t*i:ai***Q!aftll 

^tt^*lWL9 ttSi-o #©105 l*#©103 T*ffit#$tl 
<b # — y /U^^ScSrr #© 106: 107i3:#©104 ^ : ■ - v 

«9J (If A. 3E*K MHO (cjClSfca^teaax*:, *n 
■Pix*j*i-4. #©109 f*. tt^oiafpi(cl8t>e>-f@^ 

7^ 2*mK<n>ffiX$LW.t*^ts7x2 ?^j»?s't>\, h >io 
8 <D!£^*?Ate®K, ^D/7^^^^XS«t* 
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p ^7A^^^^ fr*trt±**A*i-6tfc« 20 

mmitm A**a-c a^ s nfcttaw* & ^ n ^ 5 a * ^ 

JffllBttfltA A^a-CA* $ ftfctfcHto* 6 A**« B ^ 

y^^tf«^##s<b> 

Hfr lEttfiiA^^a-cA* $ tifcttaw* <b ttixmrn & mm 
t ttittikmrnizmz:®. r> tti-tttitim b mmmmwL&^& 30 
t, 

m e# - y ^sant «*»#a-e»» s^flti^b* 
fflisui^js b tmm «tt##a-c*# s nfc m*** § 

mm^m b *o.a««Bi»^s-effi^ * tiizmt>$tm b 



[§8#JS3 ] ^-^-<-^co^(7)^— ^^#bs, IE 

Sr«tftt*SrA*-r-5tt*A**at, 
«rEtt« A^^a-C A* £ *tfctt«a> ^p^^v 

ffirEtt«A*#a-CA* S*tfctt«30^ A**« B 3t« 

y^®fisWaffit##a-c»»*tt]t-feu^ h*w= 
suEffi^ b mmmmwL'&^mxmnisntcttttmig b 

air. 

HfrEtts^^ b *aa«*»»#a-c«i» £ *tfctH*** b 
3a*«=x t wax t zststtiJimmi:*:*. 

«kas:*:^a<t. 

riiEt^— ^^1/d^7Aco^, tt«o*D{5r^B8fc>e> 
■ -f H 3£-*> ^ ^ 5 i'firfii i - <t ^ r- Iff 3 ffi 5^ * 

* ^>f Xfflf*R##a-C»# Lfc/p^^^P^ 

t'4jSLfc^-y/^ii^ mEfp*«*s*x** 
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JfA#g<!: Sr^fr^c V 7 -£*7s*r j\s h >3:1£»8Bgt&itfi 
SulB^ci ^9 A;^/u h V^-Y y ^^>?ijffi#0}i^ 

7Ai sh-fr^^afcs-r^o h >ii^#a 

p> ss a** 4: mi3£t<D±x <Dm&&t mmm 

2, 3*fcli4lBttOT :r — 9Wm?*#7 Agfttfilti/ 
A 0 

9 A ^ >r/u h v <t» <Dt*s* ?m : K I/,— ^ 5C £ Si 19 ^'5 *\ 

ft 5 IBffitf)^- **&aXc2 ^ A g '>^7 A e 

r-^MyD^7A@MjS*Stfeot, (a) X 

^fc. (b) T.Ty^a X~A?}&tltittmt>*b'7v?'7 

n^7^i:/n ^9 A#**^ XW««rB* !9 ffl-r* 
^ry^t, (c) ^^y^a"eA*$nfctt«^C>A* 

mm^mmt±i-^ hmnfemt-tis? h &&&&&& 
<omir*77-7b, (a) ^s^a-eA^saxfctt^ 
a> e> ta^*s @ ^ £ a***Qfa^ft «9 m-r*^ y 

~7t, (e) ^^s/XcT-K»stt^«a^e>^-y/u 

£*X8rt«t5^fyyt, (f) *Ty7&XWk 

(g) ^f^/dT'W^titfflM^l^i 
iUi**fti3S^ft^b, ^Iffl^SA^i^li^l^ 
i: * S tUIX: if A* £ Srgffr W^fttJaX Sr^fiR 

a^tt:£ <t MB** fc Sr^^ffl^^aXSr^-r & ^ 

(h) ituE^-^a^n^ACD?^ t±m<D 

WC^t)bf@^^0/u ?7 J*b f±$KM J:ot 



?7 A^^/U h><£>i£^Jf AfiL^lC. ^T7^bt« 

L/;/n^7A«t/o^7 A;*/ -^>f Xif $g£, #j 
»E4« Lt ffl^fiSXi: 8:#At 5 r fc ic «t 

f-^M^o^7^i»t**ST-fcoT, (a) rf 

mmt^t^itm^Ati-t^^^yyt. a) 

/atA^Snttt^^/n^A^^h^^ 
7A^^^WXfl(«S:6UUit^fy^i:, (c) ^ 

(d) ^^y^a-cA^sttfctta^&a^^Bjeii 

20 ^cT*^#$tL^:A^;^g^i:ir h*f*^«?r 
^-y/^SXSr^tS^fy^i:, (f) *"ryzT< 

dt^^^ttuMSifioH, ajfaa^jdsjf a-. > 

■r^^^y^t, (g) ^^y^dT*ffi#*ix^tii^* 

izmmzkifrx tms tf»^c t # a* t sr*tr m^^a^c 

30 XirSr^tfm^aXSrifigU ^aas'j^B'ii^com 



^tt^a*w=x<hffli»*fc^tfai*iaas:s:^-rs 

^7-yZft. (h) SufE^— ^^a^c^^AcD^ 
3E»^ft3ti:. HUE^L^ittJ^S&aXirSrffiAi-Sw 

x-^ffiaxo^^ASratft^-rs^o^^ASrffie 

so yuh>-^7!7^^-^-f x-tztiitxntnmk it, -?v?7 
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a, 

— yj^ikX^^&Lir 5 # — y^^it^fS, to 

mjiBai^JS a &mm&&n^&x~j&'& £ titc^mm a 

a, 

miam^^a a ffi3««3M»#»-c*» * ftfcta*** a 

h^co^^jf AfcgtC 8frlBXnX9A;*^/Uh>;fc.X 
X««ffi#^a-CK»L*:Xez y^Jx&krfv? 

#«"c^Lfcff*3Ett3t»3ti:, whew****** 

fgt't^ Ufcffl*«iX 4: S:#P Alh5 r 4: J: o T X 30 

[IS*J1 1 0 ] r"— ^O^fiOx— £ 

X p ^ 9 A£ 4r A^^JS a ^« 4: fcU^^ § ^ 4: ffi^J 

#**-^>f X-T5fc*!><z>tf$g4: LT. XnX9A£4:X 
A^^^-^>f XW«S:Bli9 ffii-^n^^ A^x-iryu 

ffiSEft«IA*^aT-A^Sn7ttt«^P>A**«a3Elft 



6 

a. 

femt-txs* b&ttmmkmjim&mTzmkfrb't is? 

^tt 4: a » b * — y >^ £tt x £ -f 5 # — y 3c £ 
a. 

S^fr* 4: « a tUTX 4: If A* 4: Sr^tPttJ^ttaXS:*. 

*&«*«=:*: t mmck 4: &<stsmt>tB i m3:&±f&'r z> m^j 
^s^c^^a, 

O^n ^9 A©f>tcoJ¥Affie4r Sr^fr^n ^yAx^ 

- ^ ^^XW#8i##a-effi# L/c^n^9A^4:Xn2>/ 
'iy Mtf* xmm k % huIE^ - yyujfellXdtSK^S 

#a^^ LfcHJAMX 4r 4rjfAi"5 r 4r ± o T X 

a, 

[0 0 0 1 ] 

lSI^SSf-^^^<7)Sl:Mlt ^ , MSI 
[0 0 0 2] 

86* J: "9 #aw^n ^7 AS:*f*l:flfJE, BS^^it^b 

[0 0 0 3] fi»Jx.tf 1 - 1 4 7 6 2 1 (tA 

T, Mi4#t) -CI*, /<7ffeII^Affi^i:i 
5, 7 7 >f/K *S^co#Am^^-^fC^U. (1) 
so R77^^ • KP^tf*^— ^*B«>«f*, mt£¥<» 
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^ xx # =7 A (7) 7 n >/ 7 A«5S« m £ £M1r 5 * T v -7* 

[0004] Sftffizfcitt 1 (BIT, IS 

£jh,fctt«0>5*>* AUiABI«tt«£ hf±t£<b 

[0 0 0 5] 4fc, #i¥3- 1 8 2 9 3 2 
T\ ^2^^-T) C0B0LfiO7 5 o 9 7 J* 

j&W&F^M^ It, COBOLOfl^: SQLff^ 

[0006] wEXiR2^six*:a3featif out. & 

L"C % SQLtf«i:SQLa§S««P^^*iM 
[0 0 0 7] 

-« , t*: , 3t»W!jia«:b*v^ 0 Apt,, JSl©«*»»tt; ' 

*-y/u3£*S:oaib*fiKtt:fTtonT 

[0 0 0 8] IftW7 7>1 f ^ J ?«*S:S9^D 



8 

— *S:#]JB \^tz."r — 9$mrfv ^7At(t ifco^(Oif 

^gp^Sr^s-rs^^-r^— y^^^ttc^ox. a 

[00 0 9] Z<D£ oftr — 9WMyv9 : 7 2*%^ ftffi 
— <D7 9±^m. '>^fA(Dgf«4Lti^ 

20 [0 0 10] *«W^@MI1 ?*—9'<—*<DmcO'r — 
9tr*m* i»t5f-#«l^o^5Atai 

[0011]' *-fc*38W^>*J«2*BWf±. : 

<ott«iaJfi<o#IBSrB"J« U#S J: 9 Kir* ^ i (c&So 
[0 0 12] &ti*ftW<DM<D&W}te. H«8S*w 
tti^ Jtf - ^ MI^-d^ 7 a 5: g 5 : 

[0013] 

9&&m. Mff, m^%T—9&m-?*9 = 7J**%m 
^\c±^^mm<D^—9^m^^9yj^^m±f&^ 

^e>fi^^07 p n^7A < !:tt:i(ao-rttt5 
a»^^o^9^»^#Af4Bt *$tf^D^7A^ 

46 yo^7^ * X ^ -rV Xff A'bT flu 12^-^ 

i*7£mk7v97J***9^^xmmt*^&ttm&A 

(Olf 81<J: It, /n^^^D^A^i^^X 
ft «$rfe 9 ttSf ^ p ^ 5 A ^ >ryu h * * ^ X«* 
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9 

/u3t«flr«a»#a-e*# * *tfc««a* e> # - y 

* t m B fHI* £ f¥ A* fc £*i?ffl*««:*:Sr L , 

tti*^ixs:M u « ; 3aasij^fi«ji»<7>4i'&jc««ia* 
^t.^n^^A^^^^xwaii:. sata^-y/^ 20 

[0 0,1-4] roj:?^ *«ffl#*«f^*Ufctt«A*6, 

#-y/kj&B:*\ ^*^3»^ss*. m^i&as:*^ 

U ^^fflE^tL/c^n>/^A^>ryUh><Di^^#A@ 
Bff^rttbS:J¥A"rS^i:(-«fc l 9, T — f"<—x<Dm<D 
r-^^^-y^i^:^oT#,BS, 3E*f, BURN" 5 30 

^ h > &i±m<D£u{vi (c en ^ ^ -r@ tc 5 y n >/ 

4t/:i^M/D^7^ *A»T*M*-r5»'& 
[0 0 15] ^/c^^r-^^I/p^yAlM 
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^^IT, tt^A^^a^. «LST^ffl-r^±T(DA* 
T&#i-£ 0 inciot, *]ffl#«:A**«B^«*5 

#K «t 5A*M B ^a*3 £ B ^W^Oft 

[0 0 16] ^^I^^f-^^l/o i/7AgS)^ 

m -f n if =7 A S: e lb £j* -T 5 C ^ -e # ^ J; 5 I c "T a tfi 
^>t^, tt«Oftf^«CHfc^i'@^cr)Si5^^ , n^9 At 

-f ^7^^ ^/u h Vil^^a t SrWx l-Lt 

[0017] 

[0018] cm 1 <o%m<r>mw) m 1 fi^^o^— 

ZrTjk-t^n— ht'fe^o *i\ Si 2ft ami 

[0019] 01 {CioV^T. M^Mi^^^^ttm 1 fi, 
i^t^/n^^A^l^tttfi IT, ^0^9 
Hi:AM5l^iH^^ hJSB^attU^^JSB 

#**-^>f X««££:^-Ci^So *-f, mi 7O1701 
fc^oi>T, tt^A^j^aiOi (i^coJ: 9<ctt«i ^A^J 

"#^aio2 1^. A^'ftfctwto 5 w^y* 

^n^9AgSj^#ai09 (cjg"f(1702) o X;- 
y/u^SEfll«Bi?#^ai03 AJlZtitzttmnoh. 

*-y/\si£mx&±&i-z<oiz&mtet$&tLx. xt) 
m*&&mmt-£ \s* h*iB^«£i?t^ h&ftmmzm 
i9ttiL, x;— y/u^x^j*#aio5 icjg-r(i703) o m 
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3M£l06 tftt><&m$:3LJ$.^m07 «C®i-(1704) o 
[0 0 2 0] &L\^*-^^fcmX±f&^&\05 12, # — 

^T#0S£n6^£^Bo£^tTft ? . # — yA-£^ 
3c££/£U 7v77J*&W)'£j$.^&l09 fCjgi"(170 

5) 0 *fc, f^n^^a^c^^io6 is. /±j^giB*a 

7v? z 7 A£f<7) x AT*&£^T<Offi;^*tf> io 

{i^S^^^: £ « B If »3c £ ffi A^c <t 75- e> ft 5 a* tea 

W=i:3E*rXfc^bft5tB*ttSX«:**U *&a«Sijas 
BU»OtH**^*t Ltliffii^ftX t * B i: BUG* 

jti^bftstuAttaxsr^rtu /n^7AaiM 20 

#S109 (1707) 0 

[0 0 2 1 ] 1 K*5t->"C, ^7^^^/H>> 

108 12;' £f&7v&?M;<®d V. ft«i: IT if co J: 5ft 
MIRaft^^fettrCt^kUft^W^*:. ^n^A 

/S^nfc^n^y^co»r>t^lfAi-6^i:(-J: t)> 30 

[0 0 2 2] 7x2 ?y J»&W)&j8,z£gt\09 ft % 7x2 7=7 
H^108 CQff AteM^ft. ^ci^7A*^*tJS 

Etf##ai02 -C^^ttfc^n^^A^BSrJf AU # — 
J£i05 "C^fiRSixfc^ — y^Jl^C^AL, f^XXft 

^^SffAffiSf-ffi^^mx^^ ror-c^fiK $ tt 40 
x^/u h>#**^>rxif«Etf#^aio2 -est»Lfc# 

[0 0 2 3] RK*36i«<aSI l <D|liE<a^lB<z>#8l«ria 

[0 0 2 4] 02 ( a ) HE 1 <D{±m 1 <7>ffi/£#J£^ L 

fcat-feSo 201 tzttm±fti:&Lx&9 * mnc&ti 

5tt«l «C*HS"T5o El 2 (a) {C^LfcJ: f±« 

20 Hi, ttflt^&^dcLfc^D ^7A^o^^81tT so 
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*>^^o>/^A^202 Afim<D&mk&J£B<D4>ffi 

^204 t. &t>m(o&mk&mn<D£mkm<Dmmz'a 

if a. x*k m»tom*&+temm&i 
mmmm^mkmmnm&i^m/mm^ztcfr 

<D&ft*^^m/nm0k{*k. mmm^um^k^m 

<Dm&ic&m&<nm&nwirzmm^k&^ttm?)m& 

mj£3k2Q6 k, A^^^bx-^^r^ti-^^co^Sr 
^trtrU-^ h^#£^207 k. /p^7A^^h^ 
^^^^^Xi-^fc^iC^Sft^coffi^Wa^tf^o 
^7A#**^>rX«$R208 kfrbmfiLZtlZo 

[0025] mj]&f&mfes&206 K&sft* teaasus 

tf>ti$8£E}2 (b) (C— K*T^-T 0 12 (b) Sr#fiB 

s-c*>o, *&a*fi=H:tt*-c«>ao 4flfaaBu^fiij»©» • 
9, teiStt^s-eifes, ft**, j&aftft^ftte^ft'ft; 

*<0«a#fTfoft5o B 1 a>tt«A**ai01 tt,-H*2.* 

^*^*^xw«a»#aio2 *-y>^m»« 
»»#aio3 fctn**a*aa*«a»*aio4 ica?-r 0 

[0 0 2 6] jfy&atr/U h^^^^^-T X^#® 
»^S102 f±«A^^101 ^6«Snfctt«flMS 
A»t>, Hl2CD^cr^^AiS202 k7& X?^"< 

tt#A^#^101 ^e>»$*i^tt«««^b, El 2 

4 tt«A^^sioi frbmztitzitmffinfrh. m 

[0 0 2 7] m^jJ — y J^mX±f&^\05 CDKflMc 
ov>t, E!3^rffl^TlftP^'r5o El 311. ^-y/i-^ 
X^#ai05 <o»flF«:*-r«EixEl-CfeS« Elico^- 

y/u^ax*fi)c#ai05 f*. Ei3co30i xtf — y^m 
««»»*aio3 ^bA^s^ajenwat-feu^ h« 

B^a^Sair-feu^ h*ft=S«E««Sr*-y/U3e«|«« 
i:LXSit<t5o 302 t?f4, AA*«B JE«W*M>5 

ff^T'iru^ hJlB5iJS:flFrici-5o 303 T*ht, A*** 
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*0IU ti/^ h*ftX*r^i-5o 305 "Trte, 302 . 
303 , 304 -C*ft-eh.flsj«Lfc, h^BJIh 
* iru^ h^#$r;& — y^ftH^*"^ h ^^SH- 

JSt-SffAteilKiiPA U ^-y/^iX5:Mt5o 

306 XZ<D$ — VA-^^XSrttJ/jU ilO/o^7A io 

1 tit, ^ ^ v^Wf^-te^L/c^A- h V 

T\ -feu-* bmn?mA&m02 . Aj*)i£?U!¥Afi:«70 

5o mbco^e^tc, HI 1 <DU — y /U7£mX±f&^ 
[0 0 2 9] lfe^f^lB«»3tllX3feric#Skl06 <Oiftf^(c 20 

x^#sio6 <DW}fl?g&Tffitimx*$>z> 0 mi<oftm 
^ftsaix^^aiTO^tt, m '4.^401 "cuwj*B*ys 

fca?>, &3«®JdSi¥ AT*fe5ffi*Slco^t, 402 

93S£;ft£ 0 402 0«t"T'«. ^xy^403 J&>S>405 ^t? 
<C*>ixa. 403 (cjo^T, ffl^aoua— KSBSr3S*li" 
SS!S»X*f^fiE-rSo 404 «c*3^T, f£3K1g«a!»Sr so 

403 x^m^titzmx^m-r^x^i^i-^o 405 -e 

tt, 403 -Cff*Ufcaiftll3ti:404 t'Ml/c^i 
X^ft^SSSJE**^ h>o*H£i-5if AffiK«-i*A 
-T^o 406 ^^s/^-Ctt, 402 Oil* 0 ig L iot^lS 
L^H««:3£«ISc?iJSrm*U. HI 1 co^n ^7^11 

[0 0 3 0] 0 8Kft^^f££g^*vl' h^OffitefctfiJS: 

12. S^SS:#Afi^802 AffiB803 £ 

ffoti^tlTl^o' IH4 CD405* "eii<" w*f6 r O#A 40 

[0 0 3 1 ] &lcffl;^JI;££/£#&i07 ©Bffi:op 

a 107 <7>»if^sr«i-atixia-e*>s. hi 1 wttJAfiixt 
104 d»e>m***H3e««*<kffl***Q f a««««S:S 
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tf>aWJ*Moi*-C, 502 tfSf£«9iS£*l5 0 503 lc*5^ 

-c\ 501 r*sit®o^m^»*Q.a^iSi««^9*>. fco« 
*fM»«^6*aa*ff=s:^fiKSixs 0 504 t?tt, 501 

aa»J««*s#P A^)i^l:ij:, 5^505 a»e>507 

509 *k &mmmmm*mi&<Dm&ia^ ^y^sio 
[0032] 505 -01*, mt)mf&mfem^Wiv> o *>. 

51^1^011, 3SB»*S:*^-rSo 506 "C 

507T*fi. 503 T'f^fiRLfcfeia^fefrXi:, 505 "CffrS L 
fcqiB 506 T*^bfc}fA5:SrtB^«LS^^ 

[0 0 3 3] 508 ttJ^I^^S^ftit^^ o -h(D& 

X$rMt6 0 509 T*li > 503 T'^bfcMS^S: 
ts 508 ^f^^LfcH^X^Uj^AQf^S:^^^ h^O^I* 
iC-r^Jf AfeBI-tf AU tB^«Lai:Sr^"rSo 

[0 0 3 4] 510 -cte, m*Mi^i«s^piU ^ 
iit^Mf^o 5u -ett. 503r^^ufcj&a*"«= 

»j^-r-5if Affigtcjf au aj^^axsr^-rso- * 

h v^^Sff^AJfAffiS^fifsrt^AU^^o 
[0 0 3 5] 512 T*^, 502 (Dm V iS Ui- <t o T^^5c L 

[0 0 3 6] HI 9 (a) ^ffl^toaJt^^r/Uh^Ofllric 

^j^^-To hi 9 (a) &mm-fz>t, mtttoM-x^trfr 

KV901 tt, «Lffi*<*Xif Affitt902 ir«aH-*X5iJff 
A{uM903 ^ttJ^^Clf AffiM904 Sr«poT«fiKSixTt^ 
5o HI 5 (7)507 , 509 , 51 mi. z\fhh<DW AfiStvl 

-ttt^ix, ^S^f*^:. #ASc/3E«rX/ 

BUBftitSrJfAL, U^»lXS:SdcS-fr5. HI 9 (a) 
S:#It5t, *aa*f*3tl¥Affifi902 (C»A**tfe«i 
i f 3t^W=Sfi{-*oT*3i9, -(o*fl=36SSgJ£ 

-t-S4B**:«t, *B s tt»S:»Affi«903 \zmK£fii£m" - " 
*35BoW-»4Q i a<tUi*3:fflAfflH904 icJfA^tL^ffi 

[0 0 3 7] H19 (b) ^>tbH39 (d) t-Hl 9 (a) 
tU^^Clf A&S904 (c^A^tt^. JfAX, SSf*. B 1 ) 

n^tt^-To H3 9 (b) Sr#Rg-r5<t. *&a«»J^lfA 

ttSL-C«tB^**»JCftAL, ^S^i^^ttlL 
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[oo3 8] H9 (c) zmm-rzk* tewmswgm 

[0 0 3 9] g|9 (d) ^ffitSt, ^sfflSfe 

a3b-c«£ti^^»«cftAL, u*««aa^it««?&^ 

[0 0 4 0] fticEll <7)^n^^Agli!)^^:^Sl09 <D 
E&ft^o^T, HI 1 0 £(16 £rJB^-Ci&^-r£o 1^10 

TIE id! * ftfc 7 p ^ 9 A tc «fc 9 3 SB5> £ . 

ft»*c <fc 0 * ft L * V *tt#K:#9f U ft«k: J: «9 fcfls L 

{£Bioo2<b, *-yyu^»x#Affi:«ioo3i, mim®. 

mmicfm A<£fiioo4£, - ^w^s-jfA^eioos 

£, fcH**yB:ft:5fl# AfcfilOQ6£, - ^T^S" IfAfc 

fil007«r#oT^5 0 
[0 0 4 1 ] 116 (i, yn^9Ag®b^^c#^109 <£>t*J 

Jf A f 5 r t i c J: «9 7 p ^ ^ A £ ig/jR $ -fr 5 1 <£> -C & 
p^7^X>r;l,hyi08 ^m^th-To 602 "Cl^ 7*p ^ 

5H££/£3M3;107 ri*e>Stt<k5 0 * 7^^603 t»tt/60 

2 x*%:rtkiti*— y^ii^^D^7A^^h 

<7)# — y/U^XJf AffiB*-»Ai-5o 604 "Ott, 602 

^f^*aE*S*X?UI*AffiB«w»A-r5. 605 "CIA. 60 

m*«i31XyiHf Affifi(cif Ai"^o 606 T'tt, 602 T*§ 
t o/c^o ^7i^*^/D^7A^^/U hy^/n ^ 

7A£|f AfcBl-Jf AU yn^7^^^h>^^^ 

-^Xtf$&£, *B9-C*TiC^$jxf c }f^jt^#Ai- 



60 HI 1 00/0^7-^^^ h^T-li, " #JJ8&S" 

7 p p^7A^^r;U h^/^J^-TSIS^ ^<otf>}fA<5: 
fiSrKltSwirfc^Tfig-CfcSo 607 T*(i, ^TcDXp 7 
7ABr^HA$n, ^l^p^7A^aiM5o 
[0 0 4 2] ^L±LiCj: 0 , ftttto>fe:/o ^7 

[0 0 4 3] &*>\ *R91-Cfi* # — yyi^tt^^u h 

10 /p^7A^^ hVIA, PL/SQ LfMC^oTE 

ssu {&<e>xp 7=7 * >7mm<D7* 

i/7 S ^mi&co^n ^7A^f5 r. i: ^oTr£-C& 
[0 0 4 4] H)3, HI 4. His, H 6 toiaaSKix 

m<DmmmPf& t^<oxo 4«^-efco r t m v ^ ^ t ^ 

Itl^o 0»Jx.(J. Hl3{C4o^-r, 302 £303 £304 
20 fi. roW/^T*AQ«LT fc^^L, 304 , 303 . 302 <D 

"M0 0 4 5] r <D£ 9^, **56co^ffit*fi, ~7k7=7 

[0046] (12 (DmMcDMM') m^^m<om 2 ^ 

[0 0 4 7] » 1 (7)H^(7)Jf^{Cjo^T, gl2COf±^20 
1 (i. ^p^9A^202 £A^^JS@^203 ttH 

h 31 9 ^204 £tU^^il@^a205 <bffi^^3g@tf* 
^LS206 £i?U^ h*i4=207 i^u^^^^^X 
it^208 ^P>«fi)c^ix-Ct^ 0 ^ 2 omfi^HR-Ctt, 



5 0 i~^t>*>. Mi lC^LtctpC, ^d^7^4ii 
02 £ A**3S S 3£» 1 103 £ ttJ**« B ^1 104 £ ffi^J^ 
^S^^1105£ir h&i*j£mi\06k7* 7=7 x 

^^>fX«*il07^b*fiic*nTl/^o 
[0 0 4 8] $2 OH«(OJB1»-Ctt. B 1 Otfc^A^/^ 

SlOl mi iwj:9^^ottMA*L, X 

so /u««*«*#*aio3 ii, f±«A^#sioi a»e>at£ 
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[0 0 4 9] fri^WS 2 <nmM<DM1&iz*ort z> — y^fe 

mx±fS.^\os (Dmmte&m&m i 2^1% mi 2 

GOl201T*te, # — y>^£Stf$fiEtf#3^103 ^bA^S 
tf$S£# — y/^litll$&<b LTSlt £ So 1202-en A 

^ , i3lOTL^10 HfficD^fg I ^ 33 it S # - y 
3£ftX^fi8^Sl05 C0«LS*^:^I^— T*fcS 0 
[0 0 5 0] Ull 3Sr#fiai-^4:, 1301-C*-r. -feu* 
h^ijiriru^ hJlg^iJ^r^^-r^o I302"m. ^:TCD 
A^)^«^»C0^:TC0^ g «Jf @ 13032n ^13 

oe&mvM-to i303-eii, «&»t«i%m»<DM&. o 

^D-TSo ft^T'1305T'«^»^-feu^ h^JrtfC&S^ 

^t^ic^So m^^m&ia^ i306-e«*»&-feu 

^ h*^J{CiIiDt* So itOAM^"C^>Sll:o^ 

So 

[0051] jitc j: ^ . &$&m<D%$ i <omifc<Dmm^ 

"CtfCo U:^ot, g] 1 2 (0120375^ 1207CO^S(-^ 

[0052] m<Dffif&mm<DW)m*wi i ^uss^^ 

[0 0 5 3] #Hffi<DJ£ftiT-te, *"Jffl#fitt«rt^-fe U 

[0054] csg 3 (Drnm^mm') m^^m^m 3 co 
nisojgffijc o 1* r m 1 to nm<Dten t <Dft&& £ * 

[0 0 5 5] 114 Cl#3BWtf>* 3 (Dm&<DBMiZt$rt 
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[0 0 5 6] (taHOltt, Ell<Oft«l irJttfcLT, ^ 

So l^tti^M^il5{OTf 0 B 1 5 S:#It5 
t. tti£l501d Zfvf? A£l502£A;>}^B^15 
03£i?U* hilg^«1504i:m^^g^l505<tai^ 

>7vu h >4#£tfM£l508<t ^7 A# ;* ^ W XfiffBiS 

09^^1S^t$ixT^So 
[0 0 5 7] 1 4<7>tt^A^^©1403^, H 1 5<D£ 
10 ^*«fi£S:«pott:filS:A^L, /p^A^^hvft 

»^ai405i:. * — y/^««a®»#ai406i:. tB^ 

*B*Q!afliffSi^ai407(c«-r o (ai4co^ci^7A 

h>»^W«Kl#^Sl404tt. tt«A^^Sl403 

six b >-ftmmm&m^x&fe£thtz'7v ^xtrji- h 

20 r (7)^°n A^>7"^ h>^/n^7^M^lS^ 

JXmnk* 7^-y/u^^^©1408^e>S:^ffito 
fc* — yyu^«Xi:, f^**»3e«it**#Skl409d»& 

[0 0 5 8] {&^«^g^O»jf^(im 1 OlS*l^ 

[0 0 5 9] *jUSo«f«'^tt, «R*&&aj£ffi«r!g3£ 
LfcXn^^A^^^ h v4r«»fflE-f Sr klc£ V % 

So Wx.fl «^CC0^cz^7 ^ >-^Wf§(-<fcS^n^7 

So 

[0060] [« 4 commcDftm*) ^^mm^m 4 co 

[0061] *njfi(73jgffi"e(i, El 1 <^ft«A^i^aio 

1 ^tt«SrA^-rs^^^-^^<-^^affi«S:#SL 

Ttt«SrA*"f5^^1<0*lfe^ffii:**So <C 
so ^-^-<-^^tS^li. gffij^L J: 9 ir-TS^ 
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3^101 (D&m<nfiittim$:^-f 0 

[0 0 6 2] D 1 6 S:#BBi--5 il OttfiSA^S: 
101 i* % 1601 i: 1602-C*1\ Mitttffit S A^ft <b £ti 
^*O£Bufcft£^#^S 0 8tV>-C. 1 603 £ 1604 <tT\ 

=i^>h^^$ > 5 e i605T*(t. 1603<t 1604T^#UfcA 

t>mhftxm<Dm%7Emmmzm&±^w-7r^z>o 1606 

-C(i, 1605 Lfc A^)*^Ui^«<7)JSg^aif»S: 

■f ffi±-ett*A*#«c*jffl* -frantic j: x^x^ 

S101 ^je||f(f«^6tfts|sufct>0^ffl 

snsfcft, *ijffl#ttf^«-r5ifcSf4ftv\ £*3, jg2 20 

[ 0 0-6«3l"*i3. 1 6(D1605^ 1606T*A^^^m^ 

(1) (2) So 

[0 0 6 4] (1) A^^<htti^^(7)^HU<t^^@(^^ 

x«« 4: m^^s^a^^^^ 

A**^)#«a^«aSr#ra,-j-5B#, -^hy^*<7) 

(2) A^^<bttS^i^co^Btji:#^@co3S@^. M^r~ 

a sen*^ ^"KftftjfeHi^o w 4o 

<f±^^A^^^i-^ 0 

[0 0 6 5] li] l cotttg i lc:fci>T, I2 2<£>A;*33|JS@ 
£H203 *5J:t/03**^B^ai205*co^T(i, x — * 

t*s#a-e*>s. *5H6^)jKffiT*tt. temcottm so 



d:lT, eS[«>TA^**B^ft*5<tt/ai**3SB^«S: 
ffl**0*|fflfc-ttfc«£$i*\ A**3SBJ£4*£m** 

!S^/c^<D^£8U®U */c, A?t^t^:<[: 

So 

[0066] [as 5 <omm<omm\ m^&w<om 5 <o 

unftW-TSo 

[0 0 6 7) HI 1 (DXdX^A;*^ 

j»(c»giJ-C# S <fc 9 ^^Jx.«#5**l5-§-eiaAyT^A$ 

^¥S1 0 1 fci 0 A^^ti, ^p^7Aift^¥S 

109 ic2g£ixs 0 ^D^7Agib^fiS;#aio9(i, 
>io8 *£<D^s<ym Ku^^twis^^it^^ 

tl/cr^^ffl h u— *#.£^<7)^&is-^<t t hlz.m<9 
*f9, f^^ffl(7)7 P o^7A^Mf§l^fcli, Xu 

[0 0 6 8] ^USS^Mi- tt^ 1 *P<D±f&y 

[0 0 6 9] 6 ^ItOll) JfcK*:|§W<Z>^ 6 

H16©**«coi>rBI l 8 Srfflv>TlftWi-S 0 HI l 8 £ 
#fiH-TSfc, *HSB^^6<7)|llffico?gffi« % CPU, i 
ISIS. #a^AttS*3Sfi«r^tf=>tr^ — ^1800i, IS 
»St»1803i:*^«fi)t$ix5o tt«1801iiHIlO 
'fti 1 Cft S lv .4^^ 7'^ l'802ft@ li&feayft'- 

[0 0 7 0] ffi»{SEffi803ii. ast^-r^^, 
-ey x CD-ROM*^teo««R*»9^«BiBE«JI!E 

IBft^iXTt^o 12^^1803^15®$^^—^^ 
XnX^ Agijb^/SXnX^AIi. =i > hTa — ^ 1800^ 

f 3. — ^i800^»f^Sr»Jfflii-sr 4:(CJ: «9 , 
^1800±tc. tt^A^/^1804i:. /o^^^^h 

^*^^-^>rxti»«Bi»^ai805i. y/^»«* 
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1809£, ffl;/3i&3£j£^&1810£, ^o^vA^/r^h 

[oo7i] ^tftw-cn 1 1 oii^iico 

o^7^SrlBSjKfrl803^ia»LT^o< r i:^J5 0 io 
[0 0 7 2] 

v-;*^A(7}g|ffi#J(::ol>T, HI tmi 9^684 0£r 
[007 3] il 911 r-^M/n^^^SaM 

^*^A^<DA*tt^<o#j-e&So ^sswco^—^tos 20 

/D^7Ag|t^fA|t *tt«T*fg:££ ft/eft* 

a * utr-r s ^ n ^ ^ -AtSr' a n #j *c £/&-r 

[0 0 7 4] H'l 9cpffJ"Ctt, 1901-!Cttf /fe/££ftS:/ 
u^A#" URIAGE_KEISAN " tV^yoy?^*!* 
orfcSrft^ltl^o 1903^.6 : 19-10* 

ta<ot^<om. &m<omB&. #«bos, s6*-tn*fc 

JJtlTl^o *^ar-(i. URIAESU <bSH0UHIN Olo 30 
0>«3rA*i:U URIAGEDAKA£ --otf^SrfctS***" 
So *URIAGESU«, 3S@C0DEtURIAGE^6, 
ft. char (4) . number (6) <£>*SSr t*0 0 char (4) fi4tfr 
^X^J-OifoO, number(6) li6^S^t*$)6r i:* 
SLTt^o SlSHOUHIN tCO^T t> PHU^ JggCODE^ 
NAME <!: PRICE £*£6. ^ft-^ft, char (4) . char (20). 
number (8) <0^£rf$o 0 ilURIAGEDAKAte. *I@C0DE. NA 
ME. TOTAL SrJ#*>. *I g C0DEO<fi£ IT, ^URIACESUO 
rggCODEOft^^A-r^^ t^, Jj| BNAMEOftct LT, 

• XSHOUHIN TOSS'S NAMEO{iS^f^Ai-^^'7& s ; 40 
ft. ft^SH<D' , URIAGESU.CODE" , "SHOUHIN.NAME"T* 
/T^tltl/^o ^URIAGEDAKA<7>«B TOTAL Wfii LT, 
^URIAGESUCDJS a URIACEGQfl <t ^SHOUHIN Oil @ PRICE 
<Dm&&rt&t>-&tch<D : k{XXirZ>^t&. "URIAGESU. 
URIAGE * SHOUHIN . PRICE" -e^^ftTV^ 0 1911T*H 
^URIAGESU t JISHOUH IN (Oy^— * £rx — 9 * rt> 6 ffit 

ir h Sft-ct^ 

So ntii, ^URIACESU<DJg@URIAGE<Ofil7^10J; 9 
^^T'fcot, t^o, ^URIAGESU<^>JS@C0DEOfg<t 
SSHOUHIN O^gCODEcOft^^Ll^-e-iCfcfi', itURIA so 
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GESU^SHOUHIN frh^r — * £ A;>J U ^S^"S ~tfc 
7f=£ftT^S 0 1912£l913iCtt. ^SB*QfS. l&T&mt 
LT. ^rft-^ft, Mnit_module;\"End_module;"<?:^9 
BISSr^ffii-^i^ffi^SftTV^o 
[0 0 7 5] 119 (C*3^T . 1901>&S[I] 1 1 (DZfv 7=7 

A£ll02Kl*tJS;U 19037^6l907^H]i ltf>A*S^B 
^SE1103i-*riCL, 1908^6l910<Dig£. *K@£. m<D 

mmfimi iom^^g^fiiio4ic»j£u i908a>6 

*ti£U 1911^[Ull<7)i? \s? h^#£ttll06fC*jl£U 
1912 i: 1913^11 1 1 (D^a A# ^ -v>-f Xft$&1107 

tcatrs-rSo 

[0 0 7 6] ^^>tt«T-*Sftfc«iatt. Sifts-- K(C 
ODE) t (URIAGE) g o^Jt^Sl (URIAGESU) 

£ , ^n a a =3— K (CODE) t ffip^p^ (NAME) t tiB» (PRICE) £r 
^@(Cto^D D a-^^^-^(SHOUHIN) 1^— HiSs — 

Kt?ft#-&t)-ti:, 5t_hi&: (URIAGESU) ri> 10 £ «9 ^iSp a p 
Co^T, iSfpa-K (CODE) fc ffi&& (NAME) <h *E_b|g« 
(TOTAL) £JS § 1 o3E±i«*(URIAGEDAKA) SrflSfig-T 5 

So HI2 OCil 9Sc^Lfc:tt:«^^:iaSr^-r o ^ r 

T'fi, 5c±^^2001F^^C0DEJl@O{ii:, CTx.fi 2 U = — 
K @ CO0005 H— CO fl^rCODEil S (C^o^p 0 D ^^ * — * 
2002P^cO^^— Kii5U3-KlOl/3- KT'fo5/c 

rft6cou=3— K^»fSt5- ^t-^So ::t\ 

^p°p^^^~2002J: <9 > SSft=3— KOOOSO^p^^^ 5/ 

J: 9, ttl*S-efe536±S!*2003^. fc p a ^-K^lt 
0005, FSp n p*<^ 5E±«:«i: LT8.000 H 

(20 <B * 400R) Srffitc«poU3— KSrf^rfc-rsr t4r 

[0077] *jUK0ijic*3«t5. m i (DttmAjj^mo 

tt^A^?#^l0l ^iJb^«i^LTV>So 
[0 0 7 8] S2 r&&M'-T*Z>'t * 2lGl: "CV "rt»SC« w ' 

2102: £2103: tX'ttl^ 
ft. " ^n>/7A^ : « -fxj^f=7^>> t" m : 

P^CD«»T'|S^ft/c^S . ^ HT'li. «^n^^A^» 
.(i. Hio/D ^7 A^Bcoffldsx^J^cOwCOSB^JcA 
SC££:S-fo 2104: r*^, 2105: ^-62112: *T*CO^ 

So ^C-C, #^«9iSL(C*5V^T*Q;SLTV>S^$r«^ 
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[0 0 7 9] 2105: XS±. "(«^», «Affi^!*#», 

-60 Ht, «Affi^l*#»l3:> " a>*fcf*" ffl 

It-To 2106: -Cf*, «A*K#»a s " A*" m*" 
fl»as^*h£iV M A*" o £: 2107: a*e> 

2108: " tti;*r *Tofc»frlCM\ 2109: *»e>2110: 
* s HtT$ll5o 2107: -eii, «*»^^JS@ lCo^~C21 
08: 3&s|jr)ig$ix5wi:S:^bTV^o #igB 
GD<l£r«*Ig»£-rSo 2108: T'te. 3C^'J " (<<*S S > 10 

S 0 2109 . "CWt, «*»K)#^aiCOV^TZ110: *5 

g»£-TSo 2110: "Cf4, 3t^J ,, (««e». «®», 
«»*««»)." £fE/&U «rt«B*«»*ci6JniUTV^ 
So 2111: 112106: 7&>fete*ofcIF:fcO»t£-CfcS r £ 
*r*LT^So 2112: T?Wt % 2108: 4fctt2110: 5 

iS 3-e*« KftJn $ ttfc " . " b , X^&l " ] ) " 
SrilflPbT^So 
[0 0 8 0] 2113: T*(L X*J>J" ^S^fr : 20 

^m^^titzx^n^m-to 2114- -ctt- tt«ic«3&- 

£ftfc*<Bffi©JRteK:oi^-C, 2,115,:- *S:Jfe ; «9 igi-^aSr * ■ 
^LTt^o 2115: ~Cf3\ ■"« Mt££» : « 

JRttfiS»" SrfftfcU <<rt«fflf«>>iCii*Db-C.t\S 0 ^w 

tt. " MM" , " *£T*Q;3" ^S^T*"Init_rnodu 
le;\ "End_module;" J&SJRttffiT'fcSo 30 

[0081] jsll-c, tt«rt^flf«i^^r«rtaw«» 

(::&9i£**lfcC£{£&So 0 2 2KEI1 9t?^£*l*: 

i~o 

[0 0 8 2] Xn^9A*^/U h>#;**^>f XfSfRSi 
»#®102 tt, f±t£A^#ai01 30»6a**tfcH2 2fC 

H 2 3 *c*+JB*-eft 0 Hi U 

r% * (i"(«jstt*» . « m&m») n fcm&%<nmc 

fr * b > U x 9 «( XtfiWBL'&^EtlQ2 t*(i, 02 2(C 
*i-J:5*<<rt»flM8»dS«$n*i:, 2201: £2213: 
£2214: t^t-tix^ixJIltt^iJKttflESrai^mU 0 

»*ffrau xn^^ASBft-frrt^aiog ksi-c 112 so 
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4li:<7)Ml:J;ot, 0 2 2 0OTd>bflM£ft*:«^ v 
□ ^9 a;^/^ h y * ^ ^ X|f «»^MS:/T Lfc 
£>T'£>S 0 

[0 0 8 3] # — y/u^S8«a®W^ai03 tt* ttfiSA 

^j^aioi frbm£titc<<ft&m&>>frbs Att3^E5> 

#A^T*feS:£T<D^&£JSB£<£>fS$a£, iri^ 
lortf^^) tHLT«^ — y/u£ll1t4B»€rBI2 5(7) 

9ig£*xSr £3r^b-tl^So [il 2 6 1*0 2 5 (D^itd 

fioti 2 2 (o«rtifBwa»d*bfi#sn^«^— y/U' 
^tfffi»<7)0iJ^^ufct>^-e^>So ii^-y/^ 

aiw«ai?#*aio3 t?w:, H2 2<o«rt»««»^at* 

ixS<t. 2202: ^^2206: Oif^^Iil 2 5 (7)2501 : (7)^ 
Sl:fIL, — y^^aiff«»rt*C IU2 6(7)260 
1: £2602: ^f^^i"S 0 #C^T\ HI2 202211: *»5>2 

212: o«*itojiss*:u «*-y/^nss> 

>P fe 9(Cii^Di-S 0 W&bcm 2 2<7)2207: 7^^2210: ^tf 

O2503: ^^(c^jEb, y^^«i«a»rt(-. 

D2 6O2604: £2605: £2606: ^Mt5 0 
[0 0 8 4] 0 l<^UJ^«B*Q!ffi««Bl»*®104 il. 

e 5> ^ ffi ^ -efc s £ t <d s« t m b % t m t wr » &m 

[0 0 8 5] m 2 8 flH 2 7(OJF^(C^oT[H22^«rt 

l2220«F fc 9a5ft^»^®$ixS£. 022^2207: frb22 
10: cotf «SrEl27^2701: ^CSEIL, «ttJ^«B 
^Stf®»rt«v: v HI 28(30 280 1 : ^^2807: Srf^^gi"S 0 

[0 0 8 6] i^Ci 1 (D^7 — y/U^a63t*ri£#ai05 <D 
Kf^o^ti 2 9 <h i 3 0 ^ffl^t^t^o 03 0 

S 0 3001: £3008: 11 n — "T'ife* o T V>S fc«>. 
>hX-e*>So 3002: ^>b3007: fix — ^ ^tftff^ 
yc^O-feu>> h^co^^ryu h>T*fe^, «Select*I@ff 
AfeB» £ « A^f^^SJf A1ilW» £ A{5^» 

Lfciru^ h^CtC^So 3009: TM13002: 7^«b3007: T* 

fcm&titi± is? hXizttfcistz*— y/uffiXftw.o ^ 

£K$ilt^5o *^^r/Uh>cO x 3004: «Select*I@ 
}fA{4®»£. 3005: «A*^J¥A{5^»£, 3006: 
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«*ftffl#Afi:«»«c:^-y/i/^iS«*Bi##ai03 

[0 0 8 7] 13 0liHJfi<^?^ffiT-SiWb^lil7O^; — 
y/u^Sfc*^ h>^»jSb, 4#^<£>*#J<b LT «fc «9I¥ 
*0{t:L/ct<D-CfcSo HI 3 OCO3004CO«-fc h^e^J 
t¥Afc§». 3005^O«A^*^Jif AffiB», 3006CO«-tr 

h*ft=#Afic«»tt. ^fi^tmi <n-t i«? bms 

?»Jl¥AfitK702 . A^3t*WfA£m703 , -feU* 

[0 0 8 8] 1 co# — yyi^^;££j£^:105 O 

t¥»B/«Ci(lfNtC0V^BI2 9 &m^XmW-fZ> 0 2900: "C 

^103 ^e>s«t»So n 9 <Di±m<omx-n. 12 6 a* 

# — yyu^S««T*fc-5 0 2901: 2902: -CI*. IftOigL 

T'ffl 3 g£ifc«A;^^& JlJ >x<Se 1 ec t m S » S: £ 
«3»ftL"Cl^o 2903: "Ctt. # — yA^SHf« 
I^OAMitCSl, 2904: ^?>2912: (DW^M^WkV 
il"TC^^^LT^5o «k 9 SSL fllt^S 
A**«i«A*^»T**"r o 2904: # — yA^jg 

tf^rt<7)«A^^»^7)^^@(-oV^T. 2905: f)>b29\ 
2: ^l^SDltl^^Lti/^, ^*9igbO^ 

x% 3sa LT^5«B««3se»-e*i- 0 o*«9. 290 

5: ^2912: (0#Lffif* % ^«A^J*»cO^«3S B »tc 
[0 0 8 9] 2905: X&, «A^S>x<« @ »^*a^-^ 

# # — y /u^ffiw « o tt-s#yif*j T*fiEffl $ i * » 

06:X N "« A>^?^».« g » « A^j3l»_« 

> . " t V > 9 **?U 4rffr* U ^^C«Select35 B ^I»^i6 

«A;^». ^ti^ffim 

ILTI/^AM, ^gcofil^^-ro 2907: -CteS b 
id, «A^*»*s«A^3**?iJ»«c#ffi-r5d*if 9/5^ 

L&^Jt-£(Cfi2909: "t\ ft«A^$4^J»Oi 

--[0 0 9 0] 2913: £291.4: ^tT^fl^tl': « 
Select^ B 5'J» £ « A*J*£ m»<DMc& \C fc 5 = V 

&wz>tztr>iz&mt£i><DX\ mmaz&mmi<^titbxtb 

5 0 2915: -CI*. ft^F^OirU^ h3M££ LT*^£tL 
fcF^£^£fc<<^f4^>>Uli?>;/ h^£ Q 2916: a><b2918 
-Ctt. «SelectJl @?IJ». «A^£ 

yy», «^f*lft»co(g^ > 13 otc^Ltc* — y^u^a 

h>-cO3004: h JS B ?'JJf Aft^». 300 

5: «A^*?U#Affifi», 3006: H*«=lfA 
fie»tc}fAL, # — yy^ttXSr^J5E^ii:So tc/S L 
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[0 0 9 1 ] 1 2 9 Kt% 2 <Z>*ifeCOff2Jg-Ctft9J L/cl 1 

^co^#J£ LTi 9f¥fflffcLfcfcO-e#>£ 0 1 2 9 fc:fc 
V^T. 2900(iIU 1 2(O1201iC^tJSL. 290ia>b2914^ T* 
&mi 2 (012027^6 1204(C^f^-r5 o IH2 9 (^^CO* 

^L/c[D 1 2CO1202^^^^^>-feU^ h^SStf^f^^^ 
10 S^Hffii"6£fs]^l-1203<hl204^H^bTV^^>a^ [U 

2 9<7)2906/^[g] 1 2<O1203fC*tJSb, ID 2 9 tf>2909/^IU 
1 2tD1204(cM^^-5o H12 9<D2915^[g] l 2CD1205 
{C, H12 9 02916^^2918^jH 1 2C01206^> El 2 9 CO 
2919^g]i 2O1207i-^tJSi-5o 
[0092] IU31(C 129 <7)*"^;T% HI 3 0<D# — 

y^mx^^r^b>^m2 6<d«x— yj^m\nm.» 

t'^L/^-y^i^^fto El 3 1 £13 O^rW: 
®t1rZ>t. m3 oco«±is? h 3S B Affi«». «A 

20 -ettJ^TcO^^iJ^^A^ix, ^-y/^i^LT 

«ir Lf ^ h il g ^ijjf A{4«>> : 
URIAGESU CODE 1 URT AGESU_C0DE . 
URIAGESU jURIAGE URIAGESU^URIAGE , 
SHOUHIN.NAME SHOUHIN.NAME, 
SHOUH I N.PRICE SHOUH-I N.PRICE 

«Atim&m a^s» : 

URIAGESU, SHOUH IN 

h^fefrffAffitt» : 
30 URIAGESU. URI AGE > 10 and 

URIAGESU. CODE = SHOUHIN.CODE 

[0 0 9 3] JfcfdEI 1 Of^|KCftStt^:^jA#B:106 O 
if^Co^t, i3 2tH3 3S:fflV^ttWtSo 13 

fc^o 3301: li:"-"T?^*oTl/^^fc*!), ^^>h^CT* 
fo5 0 3302: a>fb3305: fi. ^Ifft^SflJO^ ^ 
^h>"C£>5o 3302 (d^^S^^r 3304: icffi/j^S 

- -40 ' - rrft-5^"330fi?" , tt;' 6,r UJ*"ffl cof^n^^azii^coffiAfS: 

3302: «f^***S*#Affi«»i:, 
3304: «tB^3Sa^#Afitg»£, 
3306: «^a^!63tlf AffiK»i: 

ten (om^m^MmmMn^wcxM titz 

HAL, f^*aE*3e*3tSr^c**T^o^9^eWl* 
/«#J£i09 teffi-rco^, ff*^»^*3t^^Sl06 T* 

-So 

so [0094]133 (iHJfiO^ffi-CRK L/cl 8 <D\tm 
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m<kl,tzi>(DX'foZ>o 13 3 03302^33053; ^(2 8 

<Dmfcmj:&A&mso2 \cttfc-tz> 0 133 m 12 8 

<Dmi£mXnMtL&&02 OH, PL/SQLfMt 
A{£m»£^oT«J&£*LT^& 0 HI 3 3O3306 « S 
[0 0 9 5] i3 2 £ffl^T:£ll^#JlC:iolt£K ilO 10 

^H^^^^^iog oi^&sw£ift^i-5 0 

3200: "Ott\ (2 2 8O<<ffi;^g*0Sit$8>>£[2 1 Offi 
^S^t#$g&#3^:104 ^^§ft®5 0 3201: £32 
02: jgU^^T*ffl^a^«f^H^^C^^i 

3203: fl (2 1 om^JJl@^if^Sit#^104 

ft, 3204: 7^3215: £rl& 9 ^ £ £^ tt^-5o * 
3204: 7^b3215: td*5l^T. f I LTV^^ttiMli 
<<m^>>T'fl£ix£ 0 20 
[0 0 9 6] 3204: "CM 

6 Q 3205: "Ctt % * j& 0 iS L^3gT*^V^^«ai^J3Sg 
[00.9,7] 3206: T*H «ttiJ3l£>Ef£MfflR»ft<n& 

<<\&ftm:>>\zttir%^E<Dm&mWLttt. 3207: a>e>32 

08: Srj»f9iSi-wi:S:^UTl^o 3207: ri>ib32 

08: iCioV^-C, 3f B LT^£^mi<<^B>>T^£*l 30 
£ 0 3207: Tli* ttit^9C0«ai^^»O«^ B »fC*j-j£ 
f5S^«l»l-ty ht, 3208: T*te\ \«Ig@» < 
<m»" ©£**»] Srfls/SU *fc«tU**H3t»»«-il 

^o-r^o ^ob#, «tga». «ffl»tt, tti^ffi. w& 

«JlB», «S»^fittcS#i^^P>tl^o 3209: £321 
0: -Ctt, **«**3t*»K: , '« m^»_« 

« f^**»a!*»;-Sr-fey hi"5o «f£2£X» 

3204T\ "« ttJ*>S»_« ffi^3l#^>>Typ 

[0 0 9 8] 3211: /^<b3213: tli, fNSSft*^ h 
>0, ^ttlZ'tl. 

«f^*K«cS*»Affi:Jl»(c:«f^*aE*a!*»S:, 

Affifi»ic«3£ft5£ft»£r 

SAL, ffiiaat^^Lti^o 
[0 0 9 9] 3214: "CH\ %A L^lfiXftStttjt«r« 

f^«**e«xw»^a»iL, 32i5:T«, m^*** 

ClrtSLtl^o 3214: 3215: teffl;b3ia s «StS> so 
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ofc^CD. &0|&9i£LOfca6om<lT*&5 0 

H «f^H«^^^J»^^n>/^Ag»^#Sl0 
9 (-S^o 

[0100] (2 3 4 HI32 0;fr5£T\ (2 3 3 Off^ 

Lfcff«*ftft«X«:»i-. (2 3 4 £12 3 3 £itigH-£ 
£. 123 3©«fflfS:14ffAfiS»> «UWj*B5£ 
S§*$A{£a», «^^c^a^CJfA{&fi»tc, -ttt^ixW 

[0101] <<«s£«»S!4&#Affi«>> : 
UR T AGED AK A_ 1 _Type 

«m*« B ^«**Affifi» : 
, CODE char (4) 
, NAME char (13) 
, TOTAL number (14) 
«^IS#AfcB» : 
URIAGEDAKA_1 UR I AGEDAKA_ 1 _Type 
[0 10 2] ID 2 8 0#J-Cte, ttlAi^-oL^ 

[0103] 132(1 mM^mxmm intern 4 <ot$ 

3200^(2 4 0401 iC^j-J^L. 3203^32153: T*^[2 4 O 
402 Ofife0igLt^JC£t"So I2 3 2O3204H (2 4O40 

3 £404 <Dmx^ttfc^%ifimmxtbz> 0 123203205 

/j»b3208*r*ii, I2 4O403 fc:*tj£ u 

LTl/^S»T*fc^o (2 3 2 O32097^b3210£ T*^(2 4 
O404 IC^JCL. fSflt^Mttl/^a^T'fc 
^5 0 12 3 2 03211^)^3213^ T*{il2 4 O405 C^JSt, 

m»t, a^i^MLTV^o (2 3 2 03216^(2 

4O406 ic>ctj^urt^o 

[0104] &MI2 1 om^^S^C^^107 Oifcf^ 
^Cov^T(2 3 5 £12 3 6 ^fflV>-CtftP^-r5o (2 3 6 11^ 

"f, B£W4tiB^*$t^^ h VffeSo 3601: £ 
3603: £3611: l± oT ^5^ci6, 

Jtfe5 0 3602: fflAS^MI^ISrfi-ftS 
^CO^iJ^JfA^tl^r t^ttl^o 3604: T'ti, ^ 
i5c SQLRESULTfCOdSftA^ttTt^So ^ScSQLRESULT 

3605: 3610:T*(i, 3602: lc}f A ^ tt/c5:iC J: o T 

ftW^^b/ctU^^o^JSgoM^, ^->?-<-^^ic# 

#&tf#!^7^ insertiCtCioTtT^^nTV^o 360 



(16) 



ttm 2001-6015 



29 
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6: <D«thti^^ A{£B»(Cfi^£nfc*<£>, 3607: 

cD<<ffi;JjJS@£}? Afe@»lc|f^£n/cJS@<offi£r, 36 
09: <7><<f^*S»*#Afi[«>>J-li^*lx^:^»^ffii: 
U "T — ^-<— ^(C##iAtf 0 3612: 7^^3615: T*JL 

Id, *^<— *a^ig£*Lfc^7 — ^— KT'fc^SQLC 
ODE <7>fi£S:*»SQLRESULT {:ftAtt^-5 x HJ&ft&to 

[0105] 

3602: A&e»£, 10 

3606: <<ffi;>?3e£*f Afig>>£. 
3607: «aj;>J 3 l@£*?A{3:B:»£> 
3609: «f^****»Afi[«»t 

d a* js a tost* 104 ^bg^t^o tz«mt) 

^107 T'^^o 

[0106] i36 ^nificojKflg-eifteB bfcii 9 com^? 

fcLttOT^^o i3 6<D3602«3SSffS^Cjf A{£B 

»^!H 9 <djS m X{£©902 *V>'JH 3 6 • 

O3606^*e>3610^T*^[ii9Om^X#A^g903i i-^/C 
i">5 0 i3 6TU H9(Ottl^iCff A{£B903 <73'd W 
P L/SQLWf§^(7), ft«(C<te>*V^^S:@3£W- 

^^x^^tab^x^) mmte<<mtim£WZs{iLm>> t 
[0107] &^a^*&as:^#aio7 cDSMwftibfe 

l:o^ti3 5S:ffl^TKWt5, 3500: |1© 30 

m^3S@MStf^ffe#^l04 ri>5>W;ftagB#Ul««£: 

BJSCt&So 3501: £3502:te, IS 9 ig t^ltfflv^^. 

U #JJ9HfcLT^<5 0 3503: I*. [2 1 ^>ffi^?^ S to*Hf 

*«0®»lHl^ft. 3504: a>b3521: £££ >9 ^i" :i £ £: 
/Tltl^o #*5* 3504: d>£>3521: tC*3l^T\ fit 

' [ 0 T 0 8 ] 3504 : ^»5>"3"506:*""Cfi* Sfe ^jS'UrtoS'Cffl-^ 4o 

^:*X-?*x£(CU MibLtl^o 3507: fi, El 1 <Ottl 

t*«rt. «ttl**»C0JSe^fi»[E]^it. 3508: 7^635 
13: Srgfe^iS-rr £Sr^LT^5o 3508: 2>>e>35 

13: ic*>^-C\ if @ LT^£JSm3<<^B>>X**£ix 
S, 3508: £3509: "Cft, Hi^B feJStiMS^O^tiJ* 

T\ S«C«H-*^:»(c-fe3/ h-T5 0 3510: £3511: "C so 



» 



*rm£U S»«W-»S:^J»^S»fciij!ni-t-*o Jbie:St 

«fh»^:»(7)(gicM^^^P>n5o 3512: 
^mn^&o 3513: "Cfi, tti*>*»_« ffi^ 

[0 10 9] 3514: £3515: (i> -ttL-e*t«^B*5lJ» 

t«jEs«?i»ofta^-," ^r^ji^-r^o rnte. 

^ttiK»S«lt^«)T**>So 3516: ?Mb3519: T^i> tB^J 

jaii^^ b^&zti^ti, <<ai;^Bf+*3df Aft 
«», «ta^**ifAffis». Afcg> 

>x «f^j|^»^}f a<4H»jc^». «§HfS:9iJ», « 

ffl*ftiaXSr^*^5o 3520: ^LfctU^to 

ax&-«a3^*0fffii:^J»^»«^ii*pu, 3521 : -ef^; 

ttS^*#-^JC 1 ^^JD® ITl^o 3520: £3521: i^ttS^J 
fi, «£±5^to^^U»^^c^^A@i!j^^l09 ic 



[0110] I37C, 135 CO^-^T\ 036 Offi^J 

I^LtlllA^lX^^fo i3 7ii3 6^« 
£. 0 3 6^«3SBM"3S*^WAffl:ft». «m^?^# 
AfiH». «m^«g^lf Afim», «f^3i^»^&if A 

Ti^fiSc It r £ *st?^^o 

[0 111] ««BW-*3:if AffiB» : 
URIAGEDAKA_1 .CODE := W_0.URIAGESU_C0DE; 
URIAGEDAKA_1 . NAME : = W_0 . SHOUHIN_NAME ; 
UR I AGED AKA_1. TOTAL := W_0.URIAGESU_URIAGE * W_0.SH 
0UHIN_PRICE; 
«ttl*^»Ate«» : 
URIAGEDAKA 

CODE, 
NAME. 
TOTAL 

«f^**»*»Affi«» : 
URI AGEDAKA_1 . CODE , 
UR I AGEDAKA_ 1 . NAME , 
URIAGEDAKA_1 .TOTAL 



t'-i u. * - v 
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[0112] i35ii m^(ommx*mm^tzms(Dtti 

It X Vmj®iklstci>(nX'&>Z> 0 H13 StC^l^T. 3500 
JiiaSCDSOl iC^tffrU 3503ri>*b352l£T'7^[g)5<7)502 

Z>&±m<DM;Mib$:ffte<>X\'^Z>tiib^ HI 5 iCiStf £503 
£504 I^SLfc^iC ^oTV^o 13 5<D3504k, 35 
08*>ib351l£-e^H5CD503 ^ S fr ffrdc 

fC^fl^-r^o [U 3 5 003505^^3506^ 3512<t3513 
k, 3514^^1515*T*^U5(D504 T'i)5, ihJj$:<Dft 10 

£o t§)3 5 035167i^3519^T*^, El 5 O 50 
5 (C^Ltl/^ 0 1U3 5(D3522^Iil5CO506 fC^fJ^L 

[0 113] Kk^mMMlCtertZ^ m\<D-7usf=7J» 
g®r&fifc^l£l09 k-fufv A^^/U h>108 (COV^T 

5o m 3 9 cite. ^9 A^gjf a{&b». y 20 

%)M&m" W AfcH», <<tt;b&31:£?iJJf A<ifi> 

^jux^;\sb^*x?^4xmmm^&\02 , #-y 

A^^ryU h >-jjX?^4 XfW^». — y^^M 30 

-rz^kicxv* T-^^D^7A^^, £ 

[oi i4] in 3 9 (iHJfe(o^iir*iftw Lfcm i o 

ItWkLttOt-fcS, HI 3 9 (7)3901 :« T'ci^A^tf 
AfcB». 3909 :« # — y/^&ttXW AffiB», 3910 :< 

< #n^^^WAfiB». 39M:«"V}mmm u n 

«~7xj tf=7 A£ff Afiz:B» : 
w. - uriaGE_KEISAN () * ' k: ' ' " 



A{£B». 3927:« ffi^iglfclf A{£B>>, 3930:«"*£ 
T&S" If A{5:g»^Hl 1 0(7), -tiveft, ^n^A 
£Jf A{iBl002. # — y/u^ftlfcif AGl«1003. f^36SE 
*3t»Xy»J# A<£Bl004. " WbtoMT Jf AfiBlOOS. 

ai*«ias:JfAfi:«ioo6, " teTJas" »a^bioo7*c 

[oii5]gi38 \z.^%mmzm.^ z>m 1 

Ag»r&/&^:109 <D%im^m&7F-i- 9 *-*\ 3800: "C 
llO^ci^A*^ }>V108 &AJj-fZ> 0 3801T% 

«# — y /i^^3c» £ «f^Ml^»^SSX9iJ»^ 

SS:5lJ»*rS:ftSlS« 3802: 2)^3804: T\ 110^0 
^7A^^u hv^^^-^-<X«aBit#^ai02:^biK 
^tbfc«Xci ^ A* >ryu h ^ Xff $B»ri> 

?U£r, 11)3 9 0-^JX^V 3901: «^u^A£|fAf£ 

a». 3914: «%nmmmftAtiLW.». 3930: «^t^^ 

If A&B»l£J¥ At5o 3805: "Ctt* El 1 CD^7— y 

SSc^ric^Sios y^^a^c» : $rlll 

3 9 03909: «^-y^i^Aei»C{f At 5 C 
3806: -Ctt, Hl^>f^**ftS»3t4j«¥ai06 
£tltz«i¥M&%tJ£mX&\>>$:m 3^9;<7>3910: 

iS^«i^JffiAffifi*»^lfAi-5c 4 ':3807r xn. mi<o 

&m 3 9 603927: :«ttS^«LSS:^Jif AffiB»tcJf A"T 
5 0 3808: -Ctt, Hlia D ^Lfer-^ai^D ^ 
7 A^rgj l »C*5«ta*'J«>^ci^^2 £ LTffi^t^o 

[0ll6]i40l: 4 11 9 \C7jkLtc{±mfrbttiJj £ 
tl1z£j£7aS7J*<Dm&7F'f<> i4 0 k\M 3 9 Srj;btS5 
IH3 9C0«^ P ci^7 Ai&|f AiiB», 

^mmxftM&Wi»s <<ftm£%c7Emx¥$A&m>>. « 

[0117] 



y/u^ 

cursor CSR_0 is 
select 

URIAGESU.CODE URIAGESU_C0DE. 
URIAGESU. URIAGE URIAGESU_URIAGE, 
SHOUHIN.NAME SHOUIIIN_NAME t 
SHOUH I N.PRICE SHOUH I N.PRICE 
from URIAGESU. SHOUHIN 
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where URIACESU . URIAGE>10 

and URIAGESU.CODE=SHOUHIN.CODE 

W_0 CSR_0%rowtype ; 



(18) 
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type URIAGEDAKA_l_Type is record ( 
W_R0WID row id 
.CODE char (4) 
.NAME char (22) 
.TOTAL number (14) 

); 

URIAGEDAKA_1 UR I AGEDAKA_ 1 JType ; 
Ini t_module ; 



;)URIAGEDAKA_1 .CODE 
URIAGEDAKA_1 . NAME 
<ty*;URIAGEDAKA 1. TOTAL 



= W_O.URIAGESU_CODE; 
= W_O.SHOUHIN_NAME; 

=W_O.URIAGESU_URIAGE * W_O.SHOUH I N.PRICE 



,.<tm- * SQLRESULT := 0; 



— & begin 

insert into URIAGEDAKA( 
CODE 
.NAME 

,TOTAL_SALE 
) values ( 

URIAGEDAKA_1 .CODE 
, URIAGEDAKA_1 . NAME 
,UR I AGED AKA_1. TOTAL 

); 

exception 
* 4 l *'*wheh others then 



SQLRESULT := SQLCODE ; 



end; 



J * I. 



«mrmmxnA{iLm:» : 

End_module; 

[oi is] i38n mm<ommxmm Ltim 6 <oy 

£ 0 HI 3 8 CL&l^T. 3800£380H2, ^tt-^tl, me<D 
601 £602 (d^fS-r^o m3 8<D3S02fch3804lkX~fcm 
6(0606 trattfcU M 3 8 (7)3805. 3806, 3807^. i6 50 



cO^riX^tt, 603 . 604 , 605 tC*fj£i-£ 0 13 8038 
0812. (13 6(7)607 iC^f^t-^ 0 
[0 119] 

[38W0>3SJ!l*] J£JLLtttlELfc«fc *&WlC£tl^ 



(19) 
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[0120] tt, tu^ h*H3£**r S 

Mcfcotit ^(Dttfcrtyy h<}xLTm¥£%<D{±m 10 

[0121] SSi^D^7A^^h^e) 

* ttf?— # &m -f n ^ 7 a £ a ib £/#i- 5 c t & -e# 

[0 12 2] £fc, ^D^7^^>±ft:^ai(l^SixS 20 
[0 12 3] £fc, ^n^7^BB*^*3V^^:/A^Of^ 

[0 124] it, /n^yA^^ h>f*J(^ x — * 

[0 12 5] v/X^AcDtf^^-r^^ zfu^y 

^7^g»«t^Si:, tt«i:^o^7AiSi»l 

[i 1 ] *¥&w<D%i 1 (DmM<Dmm(Dmf&^7jk't7^ > 
?mxhz> 0 

[13] #3801<7>mi C0Hl£^ffi(c^»t5^-y/^ 
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[14] *^^0^1<7)*lfe<^^|Cio*t6f^^»S: 

[15] *«w^»i^3IJfi^»ffii-fc«t6ffi*«!raX: 

[17] *^p^o^i conjso^Siciott^^-y^ 

[18] **M<^*i^^lfi^ffi^i3*t-5f^^»^ 

[no] *mw<nwi\<D%m<DT&m^tert%7*? : 7 

[Hi] *!8P^(©»2<oia6<ojgffi^^n-sft«S^« 

[112] *&w<Dm 2 <Dnm<nMmiz&rt z> $ — y /i> 
in 3] *&w<nm2<DmM<ommiziortz> : t:i'i? h " 

[114] ^Ztmcom 3 <7)3lffi(D^ffico^/5)c^r^i~^^ 

111 5] *«^<0^3<Dj|J®<D^fl8{c*3«t6tt^Olff 
rfc^tlt^5 0 

[116] **W^4<0||Jfi(DJgffijC*5«t5ti:«A* 
^coM^^r^-r^^tilT'fc^o 

[117] *ftm<n$&i<o^lt&<DmWL<o&mfl*m1r!& 

[118] *&W<n%$6<nnM<DftZM<Dmf&&^1r7'u 

[119] *«W^lllS^J^tt«^«^XtJ 5 0»JSr*'t-|2 

[12 0] *«K^IIJS0iJ(Oft«^0»JoS*S:BiWi-S 
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[12 4] *«W<^HJfi«iJ(c*5ft5, 7 p d^7^^^ 
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[i26] *mm<Dnife&nc&rt z> % y/^*«« 
[12 7] *&w(DnMmiz.i3rtz>. ttitfmm&mmm 

[128] ^W^JIiS^JJ-^Jt^. tU^3S@^St*« 10 

[129] *ftw<omM&i\c}$rtz>#— y;\'j&mx$i& 

[130] *&w<vmmm^£>rtz>*— y^femx^rfa 
^Wcx*&m-tz>ii—y^'fe^'X* J r^ v y^/TtiTfc 

[13 1] — y/u^»S:*j« 

#a k x o t s ixfc # — y /^mx<Dm ^^-r i -e 

$)5o .20 

[13 2] *Kw<Dm&mictsrt z>ftm&$fij£mj:±f& 

[13 3] *«W<^llllli«lci3-*t6-fP3KS6*3eilX4* 
[13 4] *«w<omfi«aj(j:*3JtSf^^*^S:^ 

^a tz x o t <* tifc ^m^ft^a* co*0ij ^tit* 
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[13 5] ^WcollJteW^iSftStti^ftiffiSc^fiR^a 

[13 6] *ftw<Dmmmz&rt&ftt>mm$:3if8.^& 
[137] ^isw^iiifigijfcisttstb^i&axi^s 

[13 8] ^i^ilPli^ft^^n ^7 A g »)^ 

[139] *mw<DmMmiz&rtz>7 > u2'7 a*^u h 

[14 0] *«P^<O*ffi0ij«CioJt-5^C3^7 A|B^ 
<£> -So 

[14 l] « l 0tt*S»o*riiS:StH-eJ)5. 

[14 2] m2(Dfe5£&m<Dmf&&^'tmxtbz> 0 

1 - tt^i 

2 ■ -^^n^^ A 

101 -ft«A*^« 

102 ■ -yD^A^^hV^^^^ Xfflf«ft#^a 

103 ^— y/^aif#s#^a 

104 -ai*«B«!faw*Bi#*a 
los y/^3t«x*fifc#a 

106 -M^tflX^fg 

107 -milWMX±Ou^WL 

108 -yp^y^^^hV 

109 •••^n^7*e»'&/S;#a 
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(a) 



02 



203 



.204 



20s 



06 



.207 



.208 



201 



S3 



301 
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303 
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304 





1 ^-<=; 

*k A* AW, 

h*a** 
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306 



(b) 











»A 












OS 






eft 


6V 





[07] 



-AMb-vjuss 

career CSR_0 is 
select 




^702 




-feU9MKB9MA1M 




from 


^703 








where 


WQ4 




-irU?h&fH*A<&n 




• 

W_0 CSRJffircwtype; 







'701 



[04] 




401 



«isasi3ei<# A-e*-s±tt *a ico i%t 



403 

/ £ 



i 



404 



405 



i 



402 



V 



I 



406 



[02 3] 



2301: 



[*(«Jgte£» : «JKteH»)"* ] 



(22) 



ftffi 2 0 0 1-60 



[15] 



eg 

0 *JiS@ »aflM&*S«tfc* 



+ 



SO 1 



.502 



»A 



I 



man** 

****** 



T 



»AX 



I 



I 




04 



ant 



.510 



.607 



£*?AX£»A** 

1 



.soo 



*f»A** 



i 



I 



.611 



J 



512 



3d 



[HJ6 ] 



.»*■ 



603 



I 



i 



601 



^a^A^ £ :7a V s ? Uh v -< Xm« £ 



i 



604 



£»A**> 



I 



i 



602 



1 Z 06 



J 



607 



3 
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2401: 


[(yn^Afc : "UR1AGELKEISAN") 


2402: 


(MBAS : "Initj»dule; w ) 


2403: 


im-TXM : "EwLmodule:'*) 


2404: 


] 



[122 5] 



2501: [CATJ^- : : )]• ) 

2502: (--feU* : 

2503: (-mt&m- : m»fm«i<omox&m* 

2504: ] 



) 



* • 
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^802 












^803 

















[030] 



^801 



3001: — *-VJU5£» 

3002: cursor CSRJ) is 

3003: select 

3004: «-feU? hHifllJi 

3005: from «A*S*M$AteK» 

3008: where «-feU* h£fl*PAffc»» 

3007: ; 

3008: — *-VJVE&ft£iSI 

3009: W_0 CSRJffirowtype; 



(a) 



(b) 



[H19] 






H 




B02 








then 






















Begin ^904 j 






















When others then 






SQLRSSULT :- SQLCODE; 






end? 




eod_if, 





(c) 



insert into «tti2)ft£» 
«JHB*';Xh» 
) value* ( 

«*ft*'J*h» 



update «iiJ>3ft45» 
«et <<BmX*)Xh» 
WHERE «E*7*tt»; 



(d) 



delete from «tti;ftft4» 
WHERE 



[mil] 



[012] 



1102 



1103 



,1104 



i 



.1105 



1106 



1107 



HOI 



z t 'Stir.'-../ 



1203 



1201 



1202 



1204 



1205 



1206 



T 



1207 



I 
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[113] 



Create or replace function 



^1002 



( ) return number is 
begin 
declare 



^1003 
^1004 



1005 



open CSR_0 
loop 

fetch CSR_0 Into w_0; 



end loop; 



close CSR.O; 
COMMIT work; 



^1006 



-1007 



^1001 



1301 



1303 



1302 



NO 




-H^MSBHCiftllrt-* 




1305 



1307 



[114] 



1401 




2 



403 



1404 



140S 



1408 



1407 



^1400 



140O 



— .y^. .^,141 0 



^1 



1411 



1412 



'1413 



I 



[IU2 7] 



2701: CWaW : : [(ffli* S )]* ) 
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[115] 
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.1502 



1503 



1504 



1505 



1506 



1507 



1508 



1509 



1501 







i 




. / i6M 












✓ 1603 
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1605 
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I 



1606 
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.1 701 
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[il8] 



1801 



1804 



1800 3>tf: 



^1 



1806 



1 806 



1807 



1808 



1809 



1810 



re ii 



12 



1812 



1802 



1803 



[0191 



*i - 



4. .,• 



. 1 • : 1 !** 

**-«' 





URIAGE_KEISAN 


_ 1901 








a 




1902 


URIAGESU 


A* 


CODE 


char(4) 




1903 






URIAGE 


number(6) 




1904 


SHOUHIN 


AA 


CODE 


char(4) 




1905 






NAME 


cfaar<13) 




1906 






PRICE 


niunber<8) 




1907 


URIAGEDAKA 


ma 


core 


cfaar<4) 


URIAGESU.CODE 


1908 






NAME 


chai<13) 


SHOUHIN.NAME 


1909 






TOTAL 


Dumbcr(14) 


URIAGESU. URIAGE 
* SHOUHINPRICE 


1910 




URIAGESU.URIAGB > 10 and 
URIAGESU.CODE - SHOUHIN.CODE 


1911 




Ihit_module; 


1912 




End_modak; 


1913 



.» . ■ - i 



I El 3 3] 



3301: — ttjafflffc&fcSSfca 

3302: type «ft Af4»» is record* 

3303: WJttWID row id 

3304: «to1)1R3&&mXlSLB» 

3305: ); 

3306: Affc*» 
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[M2 0] 



ims i ] 



URIAGESU 

(1 



SHOUHIN 




CODE URIAGE 



-a 



CODE NAME 


PRICE 


t 5 ) (HAS) 


(«») 


oooi \m*rvh 


250 


0002 *-33U— r- 


300 


0003 


100 








3101 
3102 
3103 
3104 
3105 
3106 
3107 
3108 
3109 
3110 
3111 
3112 
3113 



cursor CSfLO is 
select 

URIAGESU. CODE URIAGESU_CODE, 
URIAGESU. URIAGE URIAGESUJAIAtX. 
SH0UH I H. NAME SH0UH1 N_NAHE, 
SHOUHIN.PRICE SHOUH I N_PR I CE 
from URIAGESU. SHOUHIN 
where URIAGESU. URIAGE > 10 and 

URIAGESU. CODE = SH0UHIN.CODE 

a 

WJ> CSRJflrctttype; 



r- • ' 

'[12 1 ] 



2101: «toumm»&&£+& 0 

2103: ~£ : r£f*tfU <<tt«*tS«a>>f 

2104: tt«/r»b4Sr*fcii-rsm fffsnL. &*<<*>><zoi>TiaT£i§yBr 



2105: 
2106: 
2107: 

2108: 

2109: 

2110: 

2111: 
2112: 



then «&»^g>»qiB«g B»fco^T£IT^IiU5-^ 



else «*»«a>#j«a«^B»<cotvTciT^ipiys'r 



HVD_IF 



2113: -*hssh* : «aa^fr»^^u «W«l«»»lr^D-r$ 

2114: *©f&(7>Ht£ICOlxTJaT£tty£* 



2115: 
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[§22] 


2201: 




: UR1AGE_KEIS AN 






2202: 


& 


:[(URIAGESU, A*. [(CODE, 


cten<4)) 




2203: 




(URIAGE, 


irambcr(6))]) 




2204: 




(SHOUHIN, A*. [(CODE, 


chai<4)) 




2205: 




(NAME, 


chai<13)) 




2206: 




(PRICE. 


number<8))]) 




2207: 




(URIAGEDAKA, tfJ*J, ((CODE, 


char(4), 


"URIAGESU.CODE~) 


2208: 




(NAME, 


char(13). 


"SHOUHIN.NAME") 


2209: 




(TOTAL, 


mnnber(14). 


"URIAGESU.URIAGE 


2210: 








* SHOUTON-PRICE")]) 


2211: 




: "URIAGESU.URIAGB > 10 and 






2212: 




URIAGESU.CODE = SHOUHIN.CODE" 




2213: 




: Init_module; 






2214: 




: End module; 







[126] 



2601: [(A*^ : (URIAGESU : [CODE URIAGE]) 

2602: (SHOUHIN : .[CODE NAME PRICE])) 

2603: (-fel^ : "URIAGESU. URIAGE > 10 and URIAGESU. CODE 

2604: (tmftffl : ["URIAGESU. CODE" 

2605: "SiOUHIN. NAME" 

2606 : "URIAGESU. URIAGE * SHOUHIN. PRICE" ] ) 

2607: J 



[N.OGDE") 



[02 8] 



2801: (ffi^J^ : [(URIAGEDAKA : [(CODE "char(4)" "URIAGESU. CODE" ) 

2802: (NAME "char(13)" "SHOUHIN. NAME") 

2803: (TOTAL "numberU'O" "URIAGESU. URIAGE 

2804: * SHOUHIN. PRICE") 
2805: ] 
2806: )] 

2807: ) 



[i34] 



3401 : - ttajflfHKSgS* 

3402: type URIAGEDAKAJJype is record( 

3403: WJttMID rcwid 

3404: ,O0DE char(4) 

3405: , NAME char (13) 

3408: , TOTAL number (14) 

3407: ); 

3408: URIAGEOMVU URIAGEDAKA_1_Type; 
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2900: *-V/W£fc«NB£3l*H2$ 

2901: 

2902: «Sefcct£391»&££'r& 

2903: *-V;U^«fll«iW(DA^X-CS5^«A^a»<CO^Ten^Syfi*f 



2904: 

2903* 
2906: 
2907: 
2908: 
2909: 
2910: 
2911: 
2912: 

2913: 
2914: 
2915: 
2916: 
2917: 
2918: 
2919: 



*- v jus Sffiia* <d« a * «i >xDig a a »rr-3t vasiT«iy 



IF -t«> M «A^«».««S»"A t *— * 
THEN **«A t\ 3c».«JS B » «A*ft»_«3flB»r : t«Select^a5i»(z-ain 

IF «A**» tt«A*«««»rt(c?¥^-r*iv? 

THEN 

ELSE "<<A*a>>r^<A*&Sfl>><D*«rc^*& 
END_IF 

ELSE 
ENDJF 



«a * «»«cD»aa>-^ffl»r * 

*-v^«xx<r;uh>e©<<*u^h«s«SAae>>f^E<<sckct«a^i>>*»A-rs 
*-v^s«^^;uh>co<<AA«^»A-aa>>fc±a<<^***9i>>$»Ar* 

*-v;ws«^^;uh^(D<<*u^h*^A<aitt>><c±ffl<<^frjfi>>$^A^* 



[(113 2] 



3200: aj*iSB&®!!ia£gfti&$ 
3201: «f&&Kmmxm>>£&t+& 

3202: «tti**S^»^1i:« 

3203: ffiA*@Wfart<»AmaK#ami*Tfc*:a<<^ 


3204: 
3205: 
3206: 


«^il*&S*»*C-«m**»_«ai*S#-%» Type~£*b?K« 
«aj±l2lB£*»££|cfS 




3207: 
3208: 




ttja*a««rt<D<<asrtfc><D<<a^ 






3209: 
3210: 
3211: 
3212: 
3213: 
3214: 
3215: 


^3T*»xy;i,h><t><<fr**fil3i«»Aft{^>fc<<^ft^«>>*^A'r& 

ft iist»^>r;i/h>a>«th * s a £ sa A<aaa»i=«ai *> g a a** 
^*s»^^uK>o<<*»^ai#Aiia>>(r<<«fit^i«>>^ifA-r5 




3216: 





' [i'3 8 ] 



3800: ^Q^AA^r;Uh>^A*-r* 

3801 : «?a?? A€»i:«^n^9A*A^7^Xfl|«»i:«*— v 
3802: «^D^A€«rA-&a»l^«^Q^A*»*»A-r^ 

3803: «rtomtom»&\iiLm»iz«timmm»&w a** 
3804: «"»7-jn3ai»Atta»(z«»7»a»$#A-r* 

3805: «*-v;u^itX»AttS»^«*-v;us«x»^|fA« 

3806: «^«&^«^^»A-aa»ic«^^«»^«5q»$jfA-r* 
3807: <<mi)&mxmmAtiLm>>iz<<ihj2tomx:$\>>&ft a-t-s 

3808: £j£Lfe?0?-7A£tii4l'r* 



(30) 



tfcm 2 0 0 1-60 



[g)3 5] 



3500: &*3!3j&SflM8$3r*tt* 



3501: 
3502: 
3503 

3504: 
3505: 
3506: 
3507: 

3508: 
3509: 
3510: 
3511: 
3512: 
3513: 

3514: 
3515: 
3516: 
3517: 
3518: 
3519: 
3520c 
3521: 



ffi**SMflN^<z><<ai*ia>>«><<iaB^^ 

<<tr**«>><D*ftc&2ir«> 

M <<aiAS>>_<<m^ft*#>>.<<iis>>^<Kft«»>><z>«ttrcaiD-r^ 



«3l S « <J»aM>v£nil*« 

aiAttit^^h>a>«a!A8«{«AftB»[:«ib)ift»«aAn 
ai^ft«^^h>fl!)<<^»ftft*»Attflt>>ic<<ftft*5i(>>«i»A-r* 



3522: «\bt>&mx9\»&mjjr* 



103 6] 



[13 3 7 ]'-'- 



3601: —amttBOKn 

3602: «Ja@it*X#Atfc!S» 

3603: — \Hj}&^<D&J]&m 

3804: SQLRESULT := 0; 

3605: begin 

3608: insert into <<ttft&«ft,XffcfK>>( 

3607: «tt««a«ffAtttl» 
3608: ) values( 

3609: «f*2l2&£#Atfcffi» 
3610: ); 
361 1 : — Qm&& 

3612: exception 

3613: when others then 
3614: SQLRESULT := SQLC 

3615: end; 



^ - 



3701 : 
3702: 
3703: 
3704: 
3705: 
3706: 
3707: 
3708: 
3709: 
3710: 
3711: 
3712: 
3713: 
3714: 
3715: 
3716: 
3717: 
3718: 
3719: 
3720: 
3721: 
3722: 



URIAGEDAKAJ-CODE := W_0.URIAGESU_C 
URI AGEDAKA_1. NAME := W^O.SHOUHIN.NAKE; 
URIACB1AKA_KT0TAL := WJ).URIAGESUJJRIAGE 

* W.O.SHOUHINLPRICE; 

SB-RESULT := 0; 
fin 

insert into URIAGEDAKA( 



TOTAL 
) values( 

URIAGEDAKAJ.CCDE, 
UR I AGEDAKA_1 - NAHE, 
UR I AGEDAKAJI . TOTAL 

exception 

when others then 

SQLRESULT := SQLCOOE; 
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3502: 


» — 
Oaf in 




3909a 


declare 










MM- 

39D0> 






3900. 


OCT VII MftJbA*- " — ft* 






C H3 tfl0l?9l 




SOB' 


5uLnc5uLI ruDsr .- Q. 




3SD9: 


«7? — / At ZSxP AHIW 




381 0. 


«frmM Mg.llTXfUJPAtam>> 




3311. 


ba(in 




3312- 


/» «3**« */ 




3913. 


— l-TJtWMHWUI 






ii In mi ia ■ l m >^ 




3915. 


— AsJfBkTi — V IHo-T — ✓ X 




391 6- 






3917. 






391B. 






3919. 


loop 




392D; 






3321 * 


TetcD CanJy ITO a_u» 




3922 T 






3823: 






3924: 


if CSH-Cafotfcifid than 




3925: 


exit; 




3825: 


end If; 




3837: 


<<tt*AttS!l»Attat>> 




332B: 


end I ooo > 




3329: 






3830: 


«r»7teW-*Attat» 




3331: 


closa CSLD; 




3332: 


— COUIlTfca 




3833: 


caniT tofix; 




3834: 


return SPLRESULT; 




3335: 


/e OUHaa •/ 




3930: 


-- w*fta 




39371 


exception 




383$: 


rhen othera then 




3939: 


SQUK5ULT := solcode: 




3940: 


ROLLBACK KWX; 




3941: 


raise; 




3342: 


and; 




3943: 


end; 
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